pragma StartUseInterfaceinclude "window.frm"sub main()	dim x as frmMain	x = new frmMain	x.show()end sub